home *** CD-ROM | disk | FTP | other *** search
/ Softdisk G-S 97 / SGDS 97.2mg / SDGS.97 / SDB97 / B / JUMP.PIT (.txt) < prev    next >
Encoding:
Applesoft BASIC Source Code  |  1989-09-20  |  241 b   |  8 lines  |  [FC] Applesoft BASIC Program (0x0801)
  1. 10  PRINT  CHR$(4)"PREFIX": INPUT K$: PRINT  CHR$(4)"PREFIX"K$
  2. 20  PRINT  CHR$(4);"-JUMP.PIT.PAK"
  3. 30  POKE  -16304,0: POKE  -16302,0: POKE  -16297,0: POKE  -16300,0
  4. 35  PRINT  CHR$(4)"BLOADJUMP.PIT.OBJ0"
  5. 40  PRINT  CHR$(4)"BLOADJUMP.PIT.OBJ1"
  6. 50  PRINT  CHR$(4)"BLOADJUMP.PIT.OBJ2"
  7. 60  CALL 2304
  8. 70  FOR I = 1 TO 2500: NEXT I: PRINT : PRINT  CHR$(4);"BYE"